
		**********************************************************
		** File: EBA dest 1-5.do								**
		** Paper: Human Trafficking Indicators: A New Dataset	**
		** Author: Richard Frank								**
		** Date: July 11, 2021									**
		** Task: Running first series of dest EBA models		**
 		**********************************************************

				clear
				version 16.1
				set max_memory 32g, permanently
				set seed 1234
				set level 95 		
				cd "C:\Users\Administrator\Desktop\"
				use "HT EBA merged DV and IVs.dta"
	
 ***************
 ** 1. agr_employment **
 ***************
		
		probit F.dest /**/ agr_employment /**/
		regsave using /**/ eba_dest_1 /**/, replace
		
		tuples 																///
		 /**/ america_l america_n conflict_external conflict_internal		///
		 cpi easia_pacific energyuse ethnic_tension	ethnic					///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british	 				///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 								///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 											///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit F.dest /**/ agr_employment /**/ `tuple`i'' gdppcl, robust cluster(ccode)
		regsave using /**/ eba_dest_1 /**/, tstat pval ci autoid append detail(all) 	
						}	
	
 **********************
 ** 2. america_l **
 **********************
		
		probit F.dest  /**/ america_l /**/
		regsave using /**/ eba_dest_2 /**/, replace
		
		tuples 																///
		 agr /**/ america_n conflict_ext conflict_int 						///
		 cpi easia_pacific energyuse ethnic_tension ethnic 					///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 								///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 											///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
				forvalues i = 1/`ntuples'   {
				   probit F.dest /**/ america_l /**/ `tuple`i'' gdppcl , robust cluster(ccode)
				regsave using /**/ eba_dest_2 /**/, tstat pval ci autoid append detail(all) 	
						}
	
 **********************
 ** 3. america_n **
 **********************
		
		probit F.dest  /**/ america_n /**/
		regsave using /**/ eba_dest_3 /**/, replace
		
		tuples 																///
		 agr america_l /**/ conflict_ext conflict_int						///
		 cpi easia_pacific energyuse ethnic_tension ethnic 					///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 								///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 											///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
				forvalues i = 1/`ntuples'   {
				   probit F.dest /**/ america_n /**/`tuple`i'' gdppcl, robust cluster(ccode)
				regsave using /**/ eba_dest_3 /**/, tstat pval ci autoid append detail(all) 	
						}
						
 **********************
 ** 4. conflict_ext **
 **********************
		
		probit F.dest  /**/ conflict_ext /**/
		regsave using /**/ eba_dest_4 /**/, replace
		
		tuples 																///
		 agr america_l america_n /**/  conflict_int							///
		 cpi easia_pacific energyuse ethnic_tension ethnic 					///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 								///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 											///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
				forvalues i = 1/`ntuples'   {
				   probit F.dest /**/ conflict_ext /**/`tuple`i'' gdppcl, robust cluster(ccode)
				regsave using /**/ eba_dest_4 /**/, tstat pval ci autoid append detail(all) 	
						}

 **********************
 ** 5. conflict_int **
 **********************
		
		probit F.dest  /**/ conflict_int /**/
		regsave using /**/ eba_dest_5 /**/, replace
		
		tuples 																///
		 agr america_l america_n  conflict_ext /**/  						/// 1-4
		 cpi easia_pacific energyuse ethnic_tension ethnic 					/// 5-9
		 europe execleft execright fdi food 								/// 10-14
		 homicides infant KOFSoGI language legal_british 					/// 15-19
		 legal_french legal_german legal_scan literacy 						/// 20-23
		 lp_catho80 lp_protmg80 media mena migration						/// 24-28
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 	/// 29-33
		 polity2 pop prevent prostitutionlaw protect 						/// 34-38
		 pve refugees religion rle sasia 									/// 39-43
		 ssa tourism trade unemployment urban 								/// 44-48
		 vae visa wecon  english 											/// 49-52
		 french german spanish portuguese landlocked 						///	53-57
				, max(3) min(3)  kronecker cond(!(20&28&44) !(20&28&43))
		
			forvalues i = 1/`ntuples'   {
		    probit F.dest /**/ conflict_int /**/`tuple`i'' gdppcl, robust cluster(ccode)
			regsave using /**/ eba_dest_5 /**/, tstat pval ci autoid append detail(all) 	
						}

	
